ocr: et Unitlpas a Unitt actNevfio, TAcion Propertes Events begin procedure TForml.actNewFileExecutecute(Sender: robject) a OnExecute acthlenfileEvecule Shoxkessage(Create New Filen: OaHint endi Onupdate end. Figure 5: Entering a ShowMessage statement for the OnExecute method.